home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / comm / cmomac02.zip / COMMO.MAC < prev    next >
Text File  |  1991-04-13  |  26KB  |  669 lines
  1. ███████████████████████████████████████████████████████████████████████████████████
  2. {C}MAC 0.2 The do everything macro for {COMMO}!               04/13/1991
  3.  
  4. This is not Share Ware.  It is FREE WARE.  And it is not finished yet so 
  5. please feel free to modify the code as much as you like.  I ask  
  6. only that you state clearly that the code has been modified and that I 
  7. be given credit for the original work.  Also I would like very much to 
  8. see any improvements or changes that you have made.  
  9.  
  10. This macro contains ideas and code from many sources.  Actually I am not 
  11. sure any of it is original.{G}  So if you see some of your code don't be 
  12. surprised.  
  13.  
  14. I can be contacted by snail mail at the address below, on The Programer's 
  15. Forum! BBS (803) 862-4616, or in the {COMMO} conference on Relay Net 
  16. ->CYBER.
  17.  
  18. The Forum! will always have the latest version of this macro.                             
  19.  
  20. Be sure to check the {C}READ.ME file for more instructions.
  21.  
  22. {don} {238}
  23.  
  24. Don Garrett      
  25. 980 Garrison Rd.      
  26. Pelzer, SC 29669
  27.  
  28.  
  29. █▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀█
  30. █ SECTION 1:  PROTOCOLS  █
  31. █▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄█
  32. ============================================================================    
  33.  Macros used for DOWNLOADING (receiving)                    Program required
  34.  ───────────────────────────────────────────────────────────────────────────
  35.  
  36.  ZMODEM batch  {.z.} {exec DSZ port %p rz -m %d %a} {}      DSZ.COM
  37.  YMODEM batch  {ydl} {exec DSZ port %p rb %d %a %w} {}      DSZ.COM
  38.  YMODEM CRC    {---} {exec DSZ port %p rc %d\%i %a %w} {}   DSZ.COM
  39.  XMODEM CRC    {---} {exec DSZ port %p rc %d\%i %a %w} {}   DSZ.COM
  40.  PUMA          {.m.} {exec PUMA P%p S%s r %d\ %a} {}        PUMA.EXE
  41.  SEALINK       {sdl} {exec cd c:\com\uldl} {exec c:\com\commo\CLINK R}  CLINK.EXE
  42.                      {exec cd c:\com\commo %a} {}
  43.  ZMAX          {mdl} {exec ZMAX -k -b 2400 -s 2048 -p %p -u %d -r %a}{} ZMAX.EXE
  44.  
  45.  
  46. ============================================================================    
  47.  Macros used for UPLOADING (sending)
  48.  ───────────────────────────────────────────────────────────────────────────
  49.  ZMODEM batch   {zup} {exec DSZ port %p sz -m %u\%i %a } {}  DSZ.COM
  50.  YMODEM batch   {yup} {exec DSZ port %p sb -k %u\%i %a %w} {}DSZ.COM
  51.  YMODEM CRC     {---} {exec DSZ port %p sx -k %u\%i %a %w} {}DSZ.COM
  52.  XMODEM CRC     {---} {exec DSZ port %p sx %u\%i %a %w} {}   DSZ.COM
  53.  PUMA           {pup} {exec PUMA P%p S%s s %u\%i %a} {}      PUMA.EXE
  54.  SEALINK        {sup} {exec CLINK T %u\%i %a} {}             CLINK.EXE
  55.  ZMAX           {mup} {exec ZMAX -b 2400 -s 2048 -p %p -f %u\%i -f }{} ZMAX.EXE
  56.  Commo PNS u/l  {pns} {exec DSZ port %p sz @c:\com\uldl\file.lst %a}{}
  57.                                      
  58. █▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀█ 
  59. █ SECTION 2:  FUNCTION KEY ASSIGNMENTS █ 
  60. █▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄█
  61. ===============================================================================
  62.  Macros for Shifted Function Keys
  63. ===============================================================================
  64.  {sf1} {goto rep} {}         All rep upload.
  65.  {sf2} {goto mmm} {}         Start mail macro.
  66.  {sf3} {goto mmr} {}         Start reps only.
  67.  {sf4} {goto amr} {}         All mail macro.
  68.  {sf5} {call mm2} {return}   Deletes all "flag files".
  69.  {sf6} {exen echo ## %%_date %%_time ## >> %c} {return}    Time mark
  70.  {sf7} {exed c:\utility\misc\list.com  commo.use /e} {} List commo.use file. 
  71.  {sf8}  {exed c:\utility\misc\list.com %c /E} {}   (Scrollback)     
  72.  {sf9}  {exec d %u\*.rep %w} {}               Dir of reply packets
  73.  {sf0}  {exec d %d\*.qw* %w} {}               Dir of mail packets
  74.  
  75. ============================================================================
  76.  Macros for Function Keys
  77.  ───────────────────────────────────────────────────────────────────────────
  78.  {nf1}{send FIRST_NAME|~~LAST_NAME|~~~~YOUR_PASSWORD|} {return}       Simple logon
  79.  {nf2}{goto wcl}{}                                    Wildcat Logon
  80.  {nf3}{exed c:\utility\shez\shez.exe c:\com\uldl} {}    Calls SHEZ in ULDL dir
  81.  {nf4}                                                U/L Rep
  82.         {send u|}{pause 2}
  83.         {exec DSZ port %p sz -m c:\com\uldl\%c.rep %a}
  84.         {exen renrep %c}
  85.  {return}        
  86.  {nf5} {exen c:\com\commo\renqwk %c} {return}       Renames .QWK file
  87.  {nf6} {goto wcm}                               Call Wild Cat Mail d/l
  88.  {nf7} {send AT L1|} {return}  Quiet modem
  89.  {nf8} {send AT L3|} {return}  Loud modem
  90.  {nf9} {exed c:\utility\misc\list.com c:\com\commo\commo.doc} {return}
  91.  {nf0} {exed c:\utility\misc\list.com c:\com\uldl} {return}
  92.  
  93.  
  94.  
  95.  ===========================================================================
  96.  Macros for Alt Function Keys
  97.  ───────────────────────────────────────────────────────────────────────────
  98.  
  99.  {af1} {goto ydl} {}           Ymodem batch download
  100.  {af2} {goto sdl} {}           Sealink download
  101.  {af3} {goto mdl} {}           Zmax download
  102.  {af4} {goto zup} {}           Zmodem upload
  103.  {af5} {goto yup} {}           Ymodem batch upload
  104.  {af6} {goto pup} {}           Puma upload
  105.  {af7} {goto sup} {}           Sealink upload
  106.  {af8} {goto mup} {}           Zmax upload
  107.  {af9} {goto pns} {}           PNS Zmodem upload
  108.  {af0} {goto olq} {}           Online quoting macro
  109.  
  110.  
  111. ===========================================================================     
  112. Macros for Control Function Keys
  113. ===========================================================================
  114.  {cf1} {goto fdn} {}           Automatic file download mark and dial
  115.  {cf2} {goto dfd} {}           Automatic file download dial marked 
  116.  {cf3} {exec c:\com\commo\bimenu} {}
  117.  {cf4} {}
  118.  {cf5} {goto de1} {}
  119.  {cf6} {goto de2} {}
  120.  {cf7} {goto de3} {}
  121.  {cf8} {goto de4} {}
  122.  {cf9} {goto de5} {}
  123.  {cf0} {exed c:\utility\misc\list.com c:\com\uldl\get} {}
  124.  
  125.  
  126.  ───────────────────────────────────────────────────────────────────────────
  127.  FUNCTION KEY ASSIGNMENTS - QUICK REFERENCE
  128.  I do a screen print of the portion below and tape it to my keyboard.
  129.  ───────────────────────────────────────────────────────────────────────────
  130.        Misc              Mail             Protocols        Files&Delays
  131.  nf1 Log on        sf1 reps mk&dial   af1 Ymod/b d/l    cf1 files mk&dial
  132.  nf2 WC log on     sf2 mail dial      af2 Sea d/l       cf2 files dial
  133.  nf3 SHEZ in ULDL  sf3 reps dial      af3 Zamx d/l      cf3 BIMENU
  134.  nf4 u/l rep       sf4 mail mk&dial   af4 Zmod u/l      cf4
  135.  nf5 renqwk        sf5 DEL flags      af5 Ymod/b u/l    cf5 delay m u&d
  136.  nf6 WC m d/l      sf6 time mark      af6 Puma u/l      cf6 delay m u&d+fd
  137.  nf7 quiet         sf7 LIST commo.use af7 Sea u/l       cf7 delay m u+fd
  138.  nf8 loud          sf8 LIST %c        af8 Zmax u/l      cf8 delay fd
  139.  nf9 LIST {C}.doc  sf9 DIR *.rep      af9 PNS Zmod u/l  cf9 delay mu
  140.  nf0 LIST uldl dir sf0 DIR *.qwk      af0 Online Quote  cf0 LIST get dir
  141.  
  142.  
  143.  
  144.                                        
  145.  █▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀█ 
  146.  █ SECTION 3:  DELAY ROUTINES  █ 
  147.  █▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄█ 
  148. ============================================================================
  149. Delay routine for Automatic Mail Upload / Download
  150. ============================================================================
  151. {de1}
  152.     {hold 0:00}
  153.     {call amr}
  154. {return}    
  155.  
  156. ============================================================================ 
  157. Delay routine for Automatic Mail Upload / Download followed by 
  158. Automatic File Download                           
  159. ============================================================================  
  160. {de2}
  161.     {hold 10:40}
  162. {---}{call amr}
  163.     {call fdn}
  164. {return}     
  165.  
  166. ============================================================================ 
  167. Delay routine for Automatic Mail Upload  followed by 
  168. Automatic File Download                           
  169. ============================================================================  
  170. {de3}
  171.     {hold 21:05}
  172. {---}{call rep}
  173.     {call fdn}
  174. {return}     
  175.  
  176.  
  177. ============================================================================ 
  178. Delay routine for Automatic File